//hdu 3718
#define maxn  1030
/************最小费用流模板*************************/
template<int maxp,int maxl>
struct CostFlow
{
	struct edge{
		int to,next,cost,flow;
	}e[maxl];
	int first[maxp],dis[maxp],vis[maxp],st,ed;
	int pay,maxflow,cas,nflow,el;//maxflow就是最大流,边从0开始到el-1
	void _insert(int s,int t,int u,int c)
	{
		e[el].cost=c;
		e[el].flow=u;
		e[el].to=t;
		e[el].next=first[s];
		first[s]=el++;
	}
	void insert(int s,int t,int u,int c)//u是流，c是费用
	{
		_insert(s,t,u,c);
		_insert(t,s,0,-c);//注意反边的参数0,-c
	}
	void init(int n )
	{
		nflow=n;
		el=maxflow=pay=0;
		cas++;
		memset(first,-1,sizeof(int)*(n+1));//注意这里的-1;
		memset(dis,0,sizeof(int)*(n+1));
	}
	int aug(int u,int x)
	{
		int T,d;
		if(u==ed)
		{
			pay+=x*dis[st]; 
			maxflow+=x; 
			return x;
		}
		vis[u]=cas;
		for(T=first[u];T!=-1; T=e[T].next)
		if(e[T].flow>0 && vis[e[T].to]<cas && dis[e[T].to]+e[T].cost == dis[u])
		{
			d= aug(e[T].to ,min(x,e[T].flow));
			if(d>0)
			{
				e[T].flow-=d ; 
				e[T^1].flow +=d; 
				return d;
			}
		}
		return 0;
	}	
	int modlabel()//寻找最短路，dis[i]为从i到ed（汇点）的最短路
	{
		int d=inf,i,T;
		for(i=0; i<nflow; i++)
		if(vis[i]==cas)
			for(T=first[i]; T!=-1; T=e[T].next)
				if(e[T].flow >0 && vis[e[T].to]<cas 
				&&  (e[T].cost-dis[i]+dis[e[T].to]<d))
					d=e[T].cost-dis[i]+dis[e[T].to];
		if(d==inf) return 1;//找不到从原点到汇点的路
		for(i=0; i<nflow; i++)
		if(vis[i]==cas)//跟新每个点到汇点的最短路
		{
			 
			vis[i]=cas-1;
			dis[i]+=d;
		}
		
		return 0;
	}
	void spfa()
	{
		queue<int>Q;
		cas++;
		int i,T;
		for(i=0; i<nflow; i++)
			dis[i]=inf;
		dis[st]=0; 
		vis[st]=cas;
		for(Q.push(st); Q.empty()==false;)
		{
			i= Q.front(); Q.pop();
			vis[i]=cas-1;
			for(T=first[i]; T!=-1; T=e[T].next)
			if(e[T].flow>0 && dis[e[T].to]> dis[i]+e[T].cost)
			{
				dis[e[T].to]==dis[i]+e[T].cost;
				if(vis[e[T].to]<cas)
				{
					vis[e[T].to]=cas;
					Q.push(e[T].to);
				}
			}
		}
		for(i=0; i<nflow; i++)
			dis[i]=dis[ed]-dis[i];
		cas++;
	}
	void work(int s,int e,int neg)
	{
		st=s;
		ed=e;
		if(neg) spfa();//neg为1，则有负边
		while(1)
		{
			while(aug(st,inf)>0)	cas++;
			if(modlabel())	break;
		}
	}
};
CostFlow<1200,120000>CF;//特别注意边数，是已知边数的两倍，因为有反边
/************最小费用流模板*************************/

int g[500][500];
int inq[500];
void get(string a,string b)
{
	memset(inq,0,sizeof(inq));
	memset(g,0,sizeof(g));
	for(int i=0; i<a.size(); i++)	
	{
		inq[a[i]]=1;
		g[a[i]][b[i]]++;
	}
}
int main()
{
 
	//freopen("in","r",stdin);
 
    int t,i,j,k;
    int l='A',r='Z';
    scanf("%d", &t);
  
    
    
    while(t--)
    {
    	   string ins,tp,s,ans;
    	int n,k,m;
    	scanf("%d%d%d\n", &n,&k,&m);
    	
    	getline(cin,ins);
   		stringstream in;
   		in<<ins;
   		
    	while(in>>s)
    	{
    		ans+=s;
    	}
    	
    	int all=200;
    	for(i=0; i<m; i++)
    	{
    		tp.clear();
    		getline(cin,ins);
    	
   			istringstream in(ins);
    		while(in>>s)
    		{
    			tp+=s;
    		}
    		 
    		get(ans,tp);
    		/************最小费用流模板*************************/
    		CF.init(all*2+10);
    		int s=0,t=all*2-1;
    		/************最小费用流模板*************************/
    		for(j=l; j<=r; j++)
    		{
    			if(inq[j])
    			/************最小费用流模板*************************/
    				CF.insert(s,j,1,0);
    			/************最小费用流模板*************************/
    			CF.insert(j+all,t,1,0);
    			for(k=l; k<=r; k++)
				if(g[j][k])
				{
				  //  printf("%d %d %d\n",j,k,g[j][k]);
					CF.insert(j,k+all,1,-g[j][k]);
				}
    		}
    		CF.work(s,t,1);
    		double res=(double)(-CF.pay)/n;
    		printf("%.4lf\n",res);
    	}
    }
	
}

